﻿Public Class CTNombresBench

 Private _nomBenchRiesgo  As String 
 Private _nomBenchDecalog As String 
 Private _esEditableNuevo As Boolean 


 Public Sub new (ByVal nomBenchRiesgo As String, ByVal nomBenchDecalog As String)
    _nomBenchRiesgo  = nomBenchRiesgo 
    _nomBenchDecalog = nomBenchDecalog
    _esEditableNuevo = False 
 End Sub


 Public Sub new (ByVal nomBenchRiesgo As String, ByVal nomBenchDecalog As String,ByVal esEditable As Boolean)
    _nomBenchRiesgo  = nomBenchRiesgo 
    _nomBenchDecalog = nomBenchDecalog
    _esEditableNuevo = esEditable 
 End Sub


 Public Sub new (ByVal esEditable As Boolean )
    _nomBenchRiesgo  = ""
    _nomBenchDecalog = ""
    _esEditableNuevo = esEditable
 End Sub


 Public Sub new ()
    _nomBenchRiesgo  = ""
    _nomBenchDecalog = ""
    _esEditableNuevo = False 
 End Sub


 
Public Property NomBenchRiesgo() As String
    Get
        Return _nomBenchRiesgo
    End Get
    Set(ByVal value As String)
        _nomBenchRiesgo = value
    End Set
End Property


Public Property NomBenchDecalog() As String
    Get
        Return _nomBenchDecalog
    End Get
    Set(ByVal value As String)
        _nomBenchDecalog = value
    End Set
End Property



Public Property EsEditableNuevo() As String
    Get
        Return _esEditableNuevo
    End Get
    Set(ByVal value As String)
        _esEditableNuevo = value
    End Set
End Property




End Class
